home *** CD-ROM | disk | FTP | other *** search
/ Old Testament Foundatiosn with Philip Yancey / Old Testament Foundatiosn with Philip Yancey - Disc 1.iso / pc / data / m42.dir / 00004.ls < prev    next >
Encoding:
Text File  |  1996-09-06  |  519 b   |  20 lines
  1. on exitFrame
  2.   global gBackLowMusicVolume, gBackHighMusicVolume, gFadeSteps
  3.   if soundBusy(2) then
  4.     set the volume of sound 1 to gBackLowMusicVolume
  5.   else
  6.     if the volume of sound 1 < gBackHighMusicVolume then
  7.       repeat with x = 1 to gFadeSteps
  8.         set the volume of sound 1 to gBackLowMusicVolume + (x * 10)
  9.         updateStage()
  10.         startTimer()
  11.         repeat while the timer < 10
  12.           nothing()
  13.         end repeat
  14.       end repeat
  15.     end if
  16.   end if
  17.   mainMenuRollovers()
  18.   go(the frame)
  19. end
  20.